home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / cgraphix / invertsc.asm < prev    next >
Assembly Source File  |  1986-04-30  |  503b  |  49 lines
  1.     title - AGraphix - assembler routines for Graphix.c
  2.  
  3.     include    model.h
  4.     include    prologue.h
  5. @CODE    ends
  6.  
  7. @DATAI    SEGMENT
  8.  
  9.     extrn    GrafBase:word
  10.  
  11. @DATAI    ENDS
  12.  
  13. BAY    equ    @ab[bp]
  14.  
  15.     public    InvertScreen
  16.  
  17. @CODE    SEGMENT
  18.  
  19.  
  20. InvertScreen    proc    near
  21.  
  22.     push    bp
  23.     mov    bp,sp
  24.     push    ds
  25.  
  26.     mov    cx,8192
  27.     xor    ax,ax
  28.     mov    si,ax
  29.     mov    di,ax
  30.     mov    ax,GrafBase
  31.     mov    ds,ax
  32.     mov    es,ax
  33.  
  34. is1:    lodsw
  35.     not    ax
  36.     stosw
  37.     loop    is1
  38.  
  39.     pop    ds
  40.     pop    bp
  41.     ret
  42.  
  43. InvertScreen    endp
  44.  
  45.     include    epilogue.h
  46.  
  47.     end
  48.  
  49.